PC Answers 2003 September/PC Answers September 2003.iso/Software/trial/AutoMate 5.0.4.1/automate5_eval_setup.exe/TaskEdit.exe/0/RCDATA/TFRMHTTPGETFILE/TFRMHTTPGETFILE.txt

Text File | 2003-01-14 | 8.2 KB | 262 lines

inherited frmHttpGetFile: TfrmHttpGetFile
  Left = 662
  Top = 20
  HelpContext = 44
  Caption = 'HTTP Download'
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  inherited pnlTop: TPanel
    inherited lblCommandName: TLabel
      Caption = 'HTTP Download'
    end
    inherited memActionDesc: TMemo
      Lines.Strings = (

          'Downloads a file using the HTTP protocol from the specified URL ' +
          '(example: '

          'http://www.unisyn.com/index.htm) optionally populating a variabl' +
          'e with the text '
        'contents of the file.')
    end
  end
  inherited pnlCenter: TPanel
    inherited pgcControlPage: TPageControl
      inherited tbsAM5Main: TTabSheet
        object Label1: TLabel
          Left = 10
          Top = 16
          Width = 300
          Height = 13
          AutoSize = False
          Caption = '&URL:'
          FocusControl = edtUrl
        end
        object Label3: TLabel
          Left = 10
          Top = 65
          Width = 300
          Height = 13
          AutoSize = False
          Caption = '&Local file:'
          FocusControl = edtLocalFilename
        end
        object Label6: TLabel
          Left = 10
          Top = 143
          Width = 217
          Height = 13
          AutoSize = False
          Caption = 'Populate &variable with result:'
          FocusControl = edtVarName
        end
        object edtUrl: TEdit
          Left = 10
          Top = 32
          Width = 449
          Height = 21
          TabOrder = 0
          OnExit = edtUrlExit
        end
        object edtLocalFilename: TEdit
          Left = 10
          Top = 81
          Width = 409
          Height = 21
          TabOrder = 1
        end
        object comSaveAs: TBitBtn
          Left = 427
          Top = 81
          Width = 32
          Height = 21
          TabOrder = 2
          OnClick = comSaveAsClick
          Glyph.Data = {
            36050000424D3605000000000000360400002800000010000000100000000100
            0800000000000001000000000000000000000001000000010000000000000000
            80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
            A60004040400080808000C0C0C0011111100161616001C1C1C00222222002929
            2900555555004D4D4D004242420039393900807CFF005050FF009300D600FFEC
            CC00C6D6EF00D6E7E70090A9AD000000330000006600000099000000CC000033
            00000033330000336600003399000033CC000033FF0000660000006633000066
            6600006699000066CC000066FF00009900000099330000996600009999000099
            CC000099FF0000CC000000CC330000CC660000CC990000CCCC0000CCFF0000FF
            660000FF990000FFCC00330000003300330033006600330099003300CC003300
            FF00333300003333330033336600333399003333CC003333FF00336600003366
            330033666600336699003366CC003366FF003399000033993300339966003399
            99003399CC003399FF0033CC000033CC330033CC660033CC990033CCCC0033CC
            FF0033FF330033FF660033FF990033FFCC0033FFFF0066000000660033006600
            6600660099006600CC006600FF00663300006633330066336600663399006633
            CC006633FF00666600006666330066666600666699006666CC00669900006699
            330066996600669999006699CC006699FF0066CC000066CC330066CC990066CC
            CC0066CCFF0066FF000066FF330066FF990066FFCC00CC00FF00FF00CC009999
            000099339900990099009900CC009900000099333300990066009933CC009900
            FF00996600009966330099336600996699009966CC009933FF00999933009999
            6600999999009999CC009999FF0099CC000099CC330066CC660099CC990099CC
            CC0099CCFF0099FF000099FF330099CC660099FF990099FFCC0099FFFF00CC00
            000099003300CC006600CC009900CC00CC0099330000CC333300CC336600CC33
            9900CC33CC00CC33FF00CC660000CC66330099666600CC669900CC66CC009966
            FF00CC990000CC993300CC996600CC999900CC99CC00CC99FF00CCCC0000CCCC
            3300CCCC6600CCCC9900CCCCCC00CCCCFF00CCFF0000CCFF330099FF6600CCFF
            9900CCFFCC00CCFFFF00CC003300FF006600FF009900CC330000FF333300FF33
            6600FF339900FF33CC00FF33FF00FF660000FF663300CC666600FF669900FF66
            CC00CC66FF00FF990000FF993300FF996600FF999900FF99CC00FF99FF00FFCC
            0000FFCC3300FFCC6600FFCC9900FFCCCC00FFCCFF00FFFF3300CCFF6600FFFF
            9900FFFFCC006666FF0066FF660066FFFF00FF666600FF66FF00FFFF66002100
            A5005F5F5F00777777008686860096969600CBCBCB00B2B2B200D7D7D700DDDD
            DD00E3E3E300EAEAEA00F1F1F100F8F8F800F0FBFF00A4A0A000808080000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
            FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000000000
            000000000000EDFFFFFF30303030303030303030303000EDFFFF3030799AA09A
            A09A9A9A9A793000EDFF30F530A09AA09AA09A9A9A9A793000FF30F530A0A0A0
            A09AA09A9A9A793000ED30F530A0A09AA0A09AA09A9A9A79300030F5F530A0A0
            A09AA09AA09A9A79300030F5F53030303030303030303030000030F5A0A0A0A0
            A0A0A0A0A09A9A7930ED30F5A0A0A0A0A0A0A0A0A0A09A7930FF30F5A0A0A0A0
            A0F5303030303030FFFFFF30F5F5F5F5F530FFFFFFFFFFFFFFFFFFFF30303030
            30FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
        end
        object cbOverwrite: TCheckBox
          Left = 10
          Top = 114
          Width = 237
          Height = 17
          Caption = '&Overwrite'
          Checked = True
          State = cbChecked
          TabOrder = 3
        end
        object edtVarName: TAM5VarListComboBox
          Left = 10
          Top = 159
          Width = 224
          Height = 21
          ItemHeight = 0
          TabOrder = 4
        end
      end
      object tbsAM5Advanced: TTabSheet [1]
        Caption = 'Advanced'
        ImageIndex = 4
        object Label2: TLabel
          Left = 10
          Top = 16
          Width = 120
          Height = 13
          AutoSize = False
          Caption = '&Port:'
          FocusControl = edtPort
        end
        object Label7: TLabel
          Left = 10
          Top = 65
          Width = 120
          Height = 13
          AutoSize = False
          Caption = '&Timeout (sec):'
          FocusControl = edtTimeout
        end
        object lblUsername: TLabel
          Left = 28
          Top = 134
          Width = 181
          Height = 13
          AutoSize = False
          Caption = 'User &name:'
          FocusControl = edtUsername
        end
        object lblPassword: TLabel
          Left = 28
          Top = 183
          Width = 215
          Height = 13
          AutoSize = False
          Caption = 'Pass&word:'
          FocusControl = edtPassword
        end
        object edtPort: TEdit
          Left = 10
          Top = 32
          Width = 224
          Height = 21
          TabOrder = 0
          Text = '80'
        end
        object edtTimeout: TEdit
          Left = 10
          Top = 81
          Width = 224
          Height = 21
          TabOrder = 1
          Text = '600'
        end
        object edtUsername: TEdit
          Left = 28
          Top = 150
          Width = 206
          Height = 21
          TabOrder = 3
        end
        object edtPassword: TEdit
          Left = 28
          Top = 199
          Width = 206
          Height = 21
          PasswordChar = '*'
          TabOrder = 4
        end
        object chkUserPass: TCheckBox
          Left = 10
          Top = 114
          Width = 231
          Height = 17
          Caption = 'Use &authentication'
          TabOrder = 2
          OnClick = chkUserPassClick
        end
      end
    end
  end
  inherited taclKeyboardTrap: TActionList
    Left = 168
  end
  inherited dxSIBarManager: TdxBarManager
    Categories.ItemsVisibles = (
      2)
    Categories.Visibles = (
      True)
    PopupMenuLinks = <
      item
        Control = lsvAM5Errors
        PopupMenu = dxCheckPopup
      end>
    DockControlHeights = (
      0
      0
      0
      0)
  end
  inherited dxCheckPopup: TdxBarPopupMenu
    ItemLinks = <
      item
        Item = itmCheckAllErrors
        UserGlyph.Data = {00000000}
        Visible = True
      end
      item
        Item = itmCheckNoErrors
        UserGlyph.Data = {00000000}
        Visible = True
      end>
  end
  inherited IvTranslator1: TIvTranslator
    Left = 232
  end
  object SaveDialog: TSaveDialog
    Filter = 'All files (*.*)|*.*'
    Left = 200
    Top = 349
  end
end